Imports System
Module qs

   Sub Main()
      'local variable definition '
      Dim a As Integer = 10
      If (a = 10) Then
          Console.WriteLine("Value of a is 10") '
      ElseIf (a = 20) Then
          Console.WriteLine("Value of a is 20") '
      Else
          Console.WriteLine("None of the values is matching")
      End If
      Console.WriteLine("Exact value of a is: {0}", a)
      Console.ReadKey()
    End Sub
End Module
